#####################################################
# HORDE PERL MODULES
# QUOTE: "Is that bad?" "Bad? No. It's disasterous"
#####################################################

package Horde;

sub new {
  my $class = shift;
  my $self = {'msn' => 0;
              'protocols' => {},
              'node' => 'Bot',
              'pdata' => {} 
             };
  bless($self, $class);
  return $self;
}

sub 